object frmGerenciarUsuarios: TfrmGerenciarUsuarios
  Left = 449
  Top = 280
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'PROFESTA - Gerenciar Usu'#225'rios'
  ClientHeight = 379
  ClientWidth = 577
  Color = clBtnFace
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Calibri'
  Font.Style = []
  FormStyle = fsMDIChild
  OldCreateOrder = False
  Position = poMainFormCenter
  Visible = True
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object lbNome: TLabel
    Left = 22
    Top = 200
    Width = 42
    Height = 18
    Caption = 'Nome:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lbLogin: TLabel
    Left = 22
    Top = 246
    Width = 37
    Height = 18
    Caption = 'Login:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lbSenha: TLabel
    Left = 296
    Top = 246
    Width = 42
    Height = 18
    Caption = 'Senha:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object lbSituacao: TLabel
    Left = 21
    Top = 284
    Width = 125
    Height = 18
    Caption = 'Situa'#231#227'o do Usu'#225'rio:'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
  end
  object Label2: TLabel
    Left = 80
    Top = 226
    Width = 468
    Height = 14
    Caption = 
      'O nome n'#227'o pode ser modificado aqui. Para modific'#225'-lo utilize o ' +
      'cadastro de pessoas.'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
  end
  object lbnaoadministrador: TLabel
    Left = 22
    Top = 329
    Width = 438
    Height = 14
    Caption = 
      'Usu'#225'rios que n'#227'o s'#227'o administradores t'#234'm privil'#233'gios reduzidos n' +
      'este m'#243'dulo.'
    Font.Charset = ANSI_CHARSET
    Font.Color = clRed
    Font.Height = -12
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
  end
  object labelAjudaGerenciarUsuarios: TInternetLabel
    Left = 510
    Top = 8
    Width = 33
    Height = 13
    Cursor = crHandPoint
    Caption = 'Ajuda'
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clBlue
    Font.Height = -12
    Font.Name = 'MS Sans Serif'
    Font.Style = [fsBold, fsUnderline]
    ParentFont = False
  end
  object gridusuarios: TDBGrid
    Left = 22
    Top = 29
    Width = 531
    Height = 168
    DataSource = DSUsuario
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 12
    TitleFont.Charset = ANSI_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -15
    TitleFont.Name = 'Calibri'
    TitleFont.Style = []
  end
  object edNome: TEdit
    Left = 80
    Top = 200
    Width = 473
    Height = 26
    Hint = 'Nome do usu'#225'rio'
    CharCase = ecUpperCase
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
  end
  object edLogin: TEdit
    Left = 80
    Top = 241
    Width = 185
    Height = 26
    Hint = 'Informe o nome de usu'#225'rio'
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnKeyPress = edLoginKeyPress
  end
  object edSenha: TEdit
    Left = 352
    Top = 246
    Width = 201
    Height = 26
    Hint = 'Informe a senha do usu'#225'rio'
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    OEMConvert = True
    ParentFont = False
    ParentShowHint = False
    PasswordChar = '*'
    ShowHint = True
    TabOrder = 3
  end
  object chboxAdministrador: TCheckBox
    Left = 21
    Top = 306
    Width = 129
    Height = 17
    Hint = 'Marque esta op'#231#227'o para torn'#225'-lo Administrador'
    Caption = 'Administrador'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = [fsBold]
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
  end
  object chboxAtivo: TCheckBox
    Left = 164
    Top = 306
    Width = 61
    Height = 17
    Hint = 'Marque esta op'#231#227'o para torn'#225'-lo Ativo'
    Caption = 'Ativo'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = [fsBold]
    ParentFont = False
    TabOrder = 5
  end
  object btbtnEditar: TBitBtn
    Left = 21
    Top = 346
    Width = 83
    Height = 25
    Caption = 'Editar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 6
    OnClick = btbtnEditarClick
  end
  object BtnFechar: TBitBtn
    Left = 470
    Top = 346
    Width = 83
    Height = 25
    Caption = 'Fechar'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 10
    OnClick = BtnFecharClick
  end
  object Btngravar: TBitBtn
    Left = 133
    Top = 346
    Width = 83
    Height = 25
    Caption = 'Gravar'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 7
    OnClick = BtngravarClick
  end
  object BtnCancelar: TBitBtn
    Left = 245
    Top = 346
    Width = 83
    Height = 25
    Caption = 'Cancelar'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 8
    OnClick = BtnCancelarClick
  end
  object ckocultarsenha: TCheckBox
    Left = 352
    Top = 273
    Width = 97
    Height = 17
    Caption = 'Ocultar senha'
    Checked = True
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -12
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    State = cbChecked
    TabOrder = 2
    OnClick = ckocultarsenhaClick
  end
  object BtnNovousuario: TBitBtn
    Left = 357
    Top = 346
    Width = 83
    Height = 25
    Caption = 'Novo'
    Enabled = False
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 9
    OnClick = BtnNovousuarioClick
  end
  object pnnovousuario: TPanel
    Left = 559
    Top = -53
    Width = 531
    Height = 355
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -15
    Font.Name = 'Calibri'
    Font.Style = []
    ParentFont = False
    TabOrder = 11
    Visible = False
    object Label1: TLabel
      Left = 232
      Top = 168
      Width = 40
      Height = 18
      Caption = 'Label1'
    end
    object Label3: TLabel
      Left = 32
      Top = 48
      Width = 37
      Height = 18
      Caption = 'Filtro:'
    end
    object Label4: TLabel
      Left = 32
      Top = 8
      Width = 364
      Height = 18
      Caption = 'Localize a pessoa que ser'#225' promovida a usu'#225'rio do sistema:'
    end
    object Btncancelarnovousuario: TButton
      Left = 443
      Top = 320
      Width = 75
      Height = 25
      Caption = 'Cancelar'
      TabOrder = 0
      OnClick = BtncancelarnovousuarioClick
    end
    object Gridpessoausuario: TDBGrid
      Left = 32
      Top = 80
      Width = 457
      Height = 227
      DataSource = dspessoausuario
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      TabOrder = 1
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -15
      TitleFont.Name = 'Calibri'
      TitleFont.Style = []
    end
    object edfiltropessoausuario: TEdit
      Left = 88
      Top = 40
      Width = 401
      Height = 26
      TabOrder = 2
      Text = 'edfiltropessoausuario'
      OnChange = edfiltropessoausuarioChange
    end
    object btncriarusuario: TButton
      Left = 32
      Top = 320
      Width = 249
      Height = 25
      Caption = 'Criar usu'#225'rio para pessoa selecionada'
      Enabled = False
      TabOrder = 3
      OnClick = btncriarusuarioClick
    end
  end
  object QueryUsuario: TZReadOnlyQuery
    Connection = Frmsenha.conn
    Params = <>
    Left = 416
    Top = 304
  end
  object DSUsuario: TDataSource
    DataSet = QueryUsuario
    OnDataChange = DSUsuarioDataChange
    Left = 456
    Top = 304
  end
  object Query1: TZReadOnlyQuery
    Connection = Frmsenha.conn
    Params = <>
    Left = 416
    Top = 336
  end
  object qrpessoausuario: TZReadOnlyQuery
    Connection = Frmsenha.conn
    AfterOpen = qrpessoausuarioAfterOpen
    Params = <>
    Left = 464
    Top = 24
  end
  object dspessoausuario: TDataSource
    DataSet = qrpessoausuario
    OnDataChange = dspessoausuarioDataChange
    Left = 504
    Top = 24
  end
end
